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Pragma's 

PRODUCT PROFILES 

Issue #17 • August 1985 

Product Profiles is published periodically by: 

Semaphore Corporation 
207 Granada Drive 
Aptos, CA 95003 

Telephone 408-688-9200 

Entire contents copyright © 1985 by Semaphore 
Corporation • All rights reserved • No part of this 
publication may be reproduced in any form or by any 
means without prior written permission from Semaphore 
Corporation • Semaphore offers no warranty, either 
expressed or implied, for any losses due to the use 
of any material published in our Product Profiles • 
Subscriptions are free, but are available only to 
Pick operating system users in the USA • Back issues 
are available by sending a stamped, self-addressed 
envelope • All material received will be considered 
for publication • Semaphore reserves the right to 
edit all submittals • Please tell us your mailing 
label number when calling or writing • Semaphore 
cannot be responsible for missing or lost issues • 
Send your new address at least four weeks before 
moving • Pick is a trademark of Pick Systems • 
Semaphore Corporation and its publications are not 
affiliated with Pick Systems in any way. 


Does Your Mailing 
Label Say RENEW? 


If the mailing label on this issue says 
RENEW, your free subscription has expired. 
To avoid missing the next issue, renew 
immediately by filling out and returning 
this coupon! 


Name: 


Company: 

Address: 


City/State/ZIP: 
Telephone: __ 


CD I use the Pick operating system and my mailing 
address is in the USA. Please continue sending me 
Pragma's Product Profiles free of charge. 

Signature: _____ 

Date: 


Return this form to: 

Pragma • 207 Granada Drive • Aptos, CA 95003 


A READ Sometimes 
Fails To Find Items 

In our June issue, we complained how some 
systems lack a LOCKED clause in READU 
statements, which means that ports that 
simultaneously update files may hang without 
being able to display a warning. Soon after 
that issue was published, we received the 
following letter from David Aitken of 
Gilt-Edge Software in Denver: 

I read with interest your June issue and the 
discussion of the LOCKED clause. While I 
agree that there is substantial overhead in 
using a locking subroutine which writes a flag 
to another file, using it has a substantial 
benefit that outweighs the cost: when a 
program crashes, there is evidence left behind 
to tell you what items may need to be 
patched back together. With READU, no such 
flags remain. Also, READU locks an entire 
group while updating takes place, thus 
preventing other users from accessing other 
items in the same group. 

A separate locking subroutine gives you the 
benefits of the LOCKED clause, tells you 
who, when, and what got locked, and frees up 
all groups for other users. 

Notwithstanding all that, I alway s use READU 
(and then RELEASE) to read an item, whether 
or not I'm going to update it. 


Why? All Pick systems seem to have what I 
would call a serious bug. If terminal A is 
writing an item in the same group that 
terminal B is trying to read from, and A 
causes the location of the items in the group 
to change, there is a small chance that a 
READ at terminal B will not find an item 
which is actually in the file (because READ 
does not check group update flags), and the 
ELSE clause will be mistakenly executed. 
READU never has that problem. 


The two programs below, when run at the 
same time on separate ports against the same 
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The Password 



NOH LET’S TALK MORE ABOUT DATA FILES 


Like a drouer in the file 
cabinet, a Data File is a 
collection of RECORDS, with 
smilar infornation stored ir 
each RECORD. 


Each RECORD has a unique RECORD 
LEV. Hhen you uant to retrieve 
the infornation in a RECORD (via 
a BASIC progran, for instance), 
you first need a RECORD LEV. 






Enter the World of PICK Through a Complete Electronic Learning System 


PROF is a hands-on, interactive learning system that will get you up 
to speed on PICK, quickly and easily. It’s clever, entertaining, and all 
learning is done right on the terminal. 

PROF leads you through simulated, HANDS-ON WORK SESSIONS 
in which you actively participate. You try every important command, 
and carefully review the way the system responds to each. It all hap¬ 
pens right on the terminal. There is no book to hold on your lap. 

PROF contains material that is suitable for both users and technical 
personnel. Give it to your application users. Use it to train new analysts 
and programmers. 

PROF allows you to learn at your own pace. You can follow the sug¬ 
gested order of instruction, or quickly jump from “page” to “page”.. .just 
like a book. 

PROF has an Electronic Master Index which works just like the index 
at the back of a book. You can peruse the alphabetical list of subjects, 
then jump right into any lesson you desire. 


PROF tells you exactly what to type. It then “checks” off each character 
as you type the right key. If you touch the wrong key, you are reminded 
by a single “beep.” Every keystroke is screened electronically. You can¬ 
not make a mistake. 


PROF covers all important aspects of PICK. This includes: 
TCL Database Concepts 

EDITOR PROC 

ACCESS DATA/BASIC 


PROF is customized. There is a different version for each manufac¬ 
turer of PICK-based equipment, including: 


Ultimate 

Microdata 

ADDS 

CDI 

Datamedia 


General Automation 

Evolution 

Pertec 

Altos 

PICK PC-XT 




YES! Please send me more information about PROF. 


Name 


Company. 
Address _ 
City_ 


.State 


Zip 


Phone( 


You can order PROF by writing or calling us at 

CRESCENDO Associates. Inc. 

24350 JOY ROAD, SUITE 7 
REDFORD TOWNSHIP, MICHIGAN 48239 
(313) 537-1919 

































WE SPECIALIZE IN USED AND COMPATIBLE 

MICRODATA 

SYSTEMS - PERIPHERALS - MEMORY - PRINTERS 

50 MB REFLEX I DISC DRIVES 
128 MB REFLEX II DISC DRIVES 
INTELLIGENT 8-WAY BOARDS, CABLES 
STANDARD 8-WAY BOARDS, CABLES 
128K MOS MEMORY BOARDS 
16K CORE MEMORY BOARDS 
PRISM I AND II CRTS 
ADDS VIEWPOINT CRTS 
★ ★★★★★★★★★★★★ 

COMPLETE MOS AND CORE SYSTEMS 
★ ★★★★★★★★★★★★ 

PRINTRONIX PRINTERS 
300LPM / 600LPM 
in stock 

★ ★★★★★★★★★★★★ 

BOARD REPAIR AND EXCHANGE SERVICE AVAILABLE 

Call CHUCK HAAS For Competitive Prices 
Buy - Trade - Sell 513-528-5400 


EflSTcomp n me. ® 


file with a modulo of one, will illustrate the 
problem: 


WRITE 

001 OPEN "JUNK" ELSE STOP 
002 ITEM = "" 

003 FOR I = 1 TO 20 

004 ITEM<I> = STR(RND(10),RND(20)) 

005 NEXT I 

006 FOR I = 1 TO 10000 

007 WRITE ITEM ON RND(10)+1 

008 NEXT I 

009 STOP 

010 END 

READ 

001 OPEN "JUNK" ELSE STOP 

002 FOR I = 1 TO 1000 

003 FOR J = 1 TO 10 

004 READ ITEM FROM J ELSE 

005 PRINT "ITEM " : J : " NOT FOUND" 

006 END 

007 NEXT J 

008 NEXT I 

009 STOP 

010 END 


Program WRITE randomly and repeatedly 
outputs items 1 through 10. Program READ 
tries to read items 1 to 10 from the same 
file. The programs may show no errors if the 
system updates items in place in each group, 


BUY • SELL • LEASE 


—jmhon. _ 

M " COMPUTER TRADERS® 

We Value Your Viewpoint! 


ADDS • ULTIMATE • PRIME 


Your Used 

ADDS Viewpoint Terminal 
Is Now Worth 

$ 310 . .. . Towards the Purchase of 

THE ALL NEW 



WYSE 

I I I I 

model WY-50 

Was $699. 



One Year Warranty 

• Ergonomically Designed 

• 16/32 Function Keys 

• 80 or 132 Column Display 

• Larger 14” Screen 



^nly S389 w^tlvADD^Viewpoini^Trade^ 

Please Call (415) 490-8733 Today 

Limited Time Offer 


^B^^EL^fAS^^^DDWJlJIMAT^RIM^ (415) 490-8733 

COMPUTER TRADERS® Th® Bayside Building 43537 Ocaso Corte Fremont, Ca 
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Unlock The 
Secrets In 
Vour Computer! 


Pragma is a 48-page journal for Pick users published quarterly 
from fiugust 1982 through February 1984. €ach issue is pocked 
with software and helpful information, including complete and 
debugged program listings and detailed, explanatory articles 
for readers at all levels of experience. Order your issues to¬ 
day and begin unlocking the secrets in your Pick systeml 





Pragma #1, August 1982: Welcome to Pragma • ZIP Code File Design • R Program 
for Renumbering Statement Labels • Deriving Veor-to-Dote Counts • VfiNlllR, The 
No-Frills Manufacturing System: The Parts File • Molectron User Profile • More 
Memory, Fewer Reads • SVSMRP: R Cross-Reference System • How to Flag Miss¬ 
ing Checks • 23 Wish List Items • Computing Modulos with GNGLISH® • Building 
CNGLISH Headings with Proc • 4 Queries • Making Item identifiers Hash Well • 
Tape Handling • Patching the €xit Problem in 3.2 SCR€€NPRO(TM) • The Shell 
Game. 


Pragma #2, November 1982: We Have Liftoff • fl Modulo Setting Program • Black 
Box Formatting • TRIM.D6LIM and PROFIL6 Utilities • SVSMRP, fl Cross-Reference 
System: File Format Input • Galinski Hamburg User Profile • LOOP vs. LOCRT6 
Benchmarks • 25 Wish List Items • Rn Introduction to 6NGLISH: Jargon • Proc Con¬ 
versions • VRNILLR, The No-Frills Manufacturing System: Bill of Material Input • 14 
Queries • The Trouble Tree • 2 Letters • R Switchbox for 32 Ports • Security and 
the DRTfl/BRSIC(TM) Programmer • The Cookie Game • Some New Subscribers. 


Pragma #3, February 1983: Is Pragma a Rare Medium, Well Done? • Cdit Rides • fl 
Proc for Cross-Referencing Q-Pointers • SVSMRP, fl Cross-Reference System: Re¬ 
maining File Input • Rainbow Natural Foods User Profile • More BASIC Benchmark 
Comparisons • Justifying Ragged Output • 13 Wish List Items • Generating Monthly 
Column Headings • VRNILLR, The No-Frills Manufacturing System: Purchasing • 5 
Queries • Rn Introduction to 6NGLISH: More Commands • Shared Site Checklist • 
Converting Paint to Programs • 3 Letters • Generating Blank Forms • Animal, R 
Game that Learns • More New Subscribers. 


Pragma #4, May 1983: Survey Says... • Pacific Valley Bank User Profile • SVSMRP, 
fl Cross-Reference System: Diets and Procs • Uncompiling: Unassembling Stack 
Code • Left vs. Right Justification Benchmarks • 4 Wish List Items • fl Comparison of 
BASIC Implementations • More New Subscribers • Rn Undocumented editor 
Capability • 3 Local User Group Reports • Avoiding Saved Lists with PQ-R6S6L6CT 
• Self-Documenting Reports • fl Query • R Survey of Hardware that Supports Pick- 
Style Software • Printer Trade-Offs • Rn Introduction to CNGLISH: Finding files • R 
Letter • VRNILLR, The No-Frills Manufacturing System: Purchase Order Cntry • The 
Swatl Game. 


Pragma #5, August 1983: Happy Birthdayl • Interactive Systems Producer Profile • 
Uncompiling: Regenerating Source Code • R Day of Revelation • IBM Personal Com¬ 
puter vs. Microdata(TM) Reality® Benchmarks • VRNILLR, The No-Frills Manufactur¬ 
ing System: Receiving • 3 Wish List Items • Rn Introduction to 6NGLISH: Being 
Choosy • Converting Manual Paint to Programs • 6 Local User Group Reports • 
More New Subscribers • fl Program that Reports File Pointer Locations • Boiler 
Plate Processing with Runoff(TM) • R New Query and an Old Query Answered • 
SVSMRP, R Cross-Reference System: Automation • Tape Types • 6 Letters • Per¬ 
muted Index to the First Four Issues of Pragma • Amazing, a Maze Game. 


Pragma #6, November 1983: Pick Pie Pictured • The Ubiquitous POINTGR-FILG • Un¬ 
compiling: Resolving Labels • Rn Introduction to 6NGLISH: Syntax Overview • Ac¬ 
cuSoft Producer Profile • Rounding Out 7 Benchmarks On 5 Machines • Designing 
Data entry Programs • 12 Wish List Items • G€T: Rn Input Processor • 5 Local User 
Group Reports • More New Subscribers • Do Vou Know Vour Proc Limits? • 
VRNILLR, The No-Frills Manufacturing System: Inspection • 2 Queries • Individual 
Recounts or Shared Recounts? • Lock Logic Illustrated • Password Protection • Two 
Undocumented Conversions • fl Letter • How AMAZING Works. 


Pragma #7, February 1984: More New Subscribers • R New Machine Visits Pragma 
• Bantam Hardware Overview • Suppressing LOCKGD Clauses • Rn Introduction to 
CNGLISH: WITH, BV and TOTAL • Bantam Producer Profile • VRNILLR, The No-Frills 
Manufacturing System: Disposition • fl Bantam Diary • New Benchmark Timings For 
8 More Machines • 6 Local User Group Reports • G€T: Source Code • R 
Preprocessor for Symbolic Statement Labels • 2 Wish List Items • 3 Queries • Ban¬ 
tam Software Overview • R Letter • The Slide Game. 





Send $25 for each 48-page back issue to: 

Pragma 

207 Granada Drive 
Aptos, CA 95003 




but if the system deletes items from a group 
and adds them to the end of a group when an 
item is rewritten, you'll see many errors. 

This problem has other manifestations which 
we have all seen before. Namely, soft group 
format errors in English/Recall/Access, and 
proc problems when someone inadvertently 
writes to a group containing an executing 
proc. 

A support person at Pick told us that this 
problem has been fixed in all of their 
releases since April 1984, but when we tried 
David's programs on a machine with software 
released this year, the ELSE clause in READ 
was indeed often mistakenly executed (along 
with occasional group format errors appearing 
at WRITE's port). 

It seems David's advice is worth taking. If 
you READ from a file that another port may 
be simultaneously WRITEing, then use READU 
instead (followed by a RELEASE). A 





The Pick System is designed to courses embody Dick Pick’s 

be user friendly. Now, Pick is philosophy on data processing, 

offering three courses to make it a and each one is taught by an 

fast friendship. instructor who is current on the 

These courses cover latest developments 

a range of instruc- BMpf * j I, in the system. 

tion for everyone - m V This is your chance 

from the Pick novice SYSTEMS to p i c k our brains 
to the advanced programmer. about the Pick System. 

What really makes these For additional information 
courses unique is that they send in the form to Pick Systems 
come from the original source — 1691 Browning, Irvine, California 

Pick Systems itself. All the 92714 or call (714) 261-7425. 


Please send a registration application and course schedule to: 

Name___ 

Title __ 

Company__ 

Address_ 

City/State/Zip____ 

Phone__ 
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OVER EASY 

from Crescendo Associates, Inc. 


No longer will the width of your spreadsheets, reports and prin¬ 
touts be limited by the width of your line printer! OVEREASY 
is a software program which takes a report and “flips” it 90 
degrees, so that it prints across the perforations. You can now 
create printouts which are infinitely wide! 


• OVEREASY is similar to the Side¬ 
ways product on microcomputers. 
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• OVEREASY works with most popu¬ 
lar dot matrix printers including 
Epson, C. Itoh, Okidata, Mannes¬ 
man Tally, and Printronix. 
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• OVEREASY takes any report out 
of the spooler hold file. Anything 
that you can get into the spooler, 
you can print with OVEREASY. 
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• OVEREASY works with all popular 
Pick-compatible spreadsheets includ¬ 
ing Realcalc, Spreadneat, Compu- 
sheet, Auroplan, Ulticalc, and Cal- 
cumentor. 

• OVEREASY is available for all 
Microdata, Pick-compatible, and 
Prime Information Systems. 

• OVEREASY costs just $395! 


You can order OVEREASY by writing or calling us at 
Crescendo Associates, Inc. 


Crescendo Associates, Inc. 

24350 Joy Rd., Suite 7 
Redford Township, Michigan 48239 

—( 313 ) 537-1919 ... 
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LOCATION ----- HISTORICAL----- - 

1375 y. 1376 % 1377 V. 1378 Y. 1373 '/. 1380 V. 1381 V. 1382 V. 1383 V. 1384 V. 1385 



































YOUR APPLICATION 
SOFTWARE MAKES 
MORE SENSE ON A 
MENTOR* COMPUTER 

The software you bought was designed 
to help you run your business. So if you 
can’t access it properly, can’t use it to its 
fullest, you and your business have a 
serious problem. The solution you were 
sold is not the answer. 





the system. Mentor understands the 
language you do. English. We call it 
INFO/ACCESS. Easy to use but powerful 
enough to generate just about any kind of 
report you can imagine. 

Talk to us. There’s an expert Mentor 
Systems Marketer near you. That 
Marketer will provide you with a wide range 
of programs to fit your business. So 
you don’t have to work it the other 
way around. 

Call your nearest Mentor marketer today. 
And get the right solution. 


Well, relax. ADDS, a subsidiary of NCR, is here 
to help. ADDS Mentor and its enhanced PICK 


IT ALL ADDS UP. 


operating system will open a communications 
channel between you, your software and your 
hardware the likes of which you have never 
enjoyed before. 

And because Mentor computer systems are 
expandable, as your business grows, so can 



Applied Digital Data Systems Inc. 


A Subsidiary of NCR Corporation 


100 Marcus Boulevard, Hauppauge, NY 11788 USA 

Tel. (516) 231 -5400 • Telex 510-227-9886 • Fax (516) 231 -7378 


® Mentor is a registered trademark of Applied Digital Data Systems, Inc. 




















